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MOMDEF .MDL - internal service definitions for Maintenance Operations Module 


| Version: *v04-000" 
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DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 
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Zud SOFTWARE 1S FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
+ COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
® OTHER PERSON. NO TITLE TO AND OUNERSHIP OF THE SOFTUARE iS HEREBY 
* TRANSFERRED. 
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THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
CORPORATION. 

DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


ee — —50— 
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ABSTRACT: 
This file contains varions service SDL definitions for MOM. 
ENVIRONMENT: 
n/a 
AUTHOR: Kathy Perko 17-Dec-1982 
MODIFICATION MiSTOaY: 
V03-007 MKP0007 Kathy Perko 21-July-1984 
Increase size of maximum MOP —2 buffers so they 
can hold a fairly large Loop message. Other logic al 
be added to recover gracefull 
larger than this buffer. 
v03-006 MKP0006 Kathy Perko — 
Remove echo parameter from CIB P2 buffer so QNAs will do 
service functions. 


v03-005 mKP0005 Kathy Perko 12-April-1984 
Add dump complete MOP function code. 


v03-004 MKP0004 Kathy Perko 11-April-1984 


{ 

{ 

{ 

{ 

{ 

{ 

< 

f 

ps FACILITY: VAX/VMS DECnet Maintenance Operations Module (MOM) 
{ 

{ 

{ 

{ 

{ 

{ 

{ 

{ 

{ 

{ 

{ 

{ 

{ 

; y if the loop message is 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
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Convert file to SDL. 


v03-003 MKP0003 Kathy Perko 26-Mar-1984 
Fix area 1 problem. 
v03-002 —*— Kathy Perko 11-Feb-1984 


e Remote Console protocol type for Boot message on NI 
he gg ay of Load Dump protocol = the DEUNA doesn't care, 
oe 


QNA does). 


v03-001 MKP0001 Kathy Perko 10-May-1983 
Allow load file names of up to 128 characters. 


{-- 


r — — — — — — — 
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‘ Symbol definitions for the Network Management Maintenance Operations Module 


getule SMOMDEF ; 
* 


/* Internal codes used to identify entity type of current circuit, 


/* Line or node. 
/e 


constant ( 
» NODEBYNAME 
° a a 
§ equals 0 increment 1 prefix MOM tag $C; 
je 
* MOM constants used in parsing NICE messages. 
e 
constant ( 
NODE _ID_PARAM /* Parameter is a node address and/or name 
, NODE-ADBR_PARAM /* Parameter is a node address 


) equals 0 Tncrement 1 prefix MOM tag $C; 
je 
* Flags set in MOMSGL_SERVICE_FLAGS 
eo 


aggregate MOMDEF union fill prefix MOMS; 
” MOMDEF BITS structure fill; 


AUTOSERVICE bitfield mask; /* Autoservice function in progress (as 
/* opposed to operator requested 
/* service function. 
NI_CIRC bitfield mask /* Service function is on an Ethernet circuit. 


OUT bitfield mask; 


NI_MULTICAST bitfield mask; 


end MOMDEF _BITS; 
e 

8 MOM facility code 
o 


constant SIG-CODE equals 519*6 


je 


~ 


constant FAC_CODE equals 213 ecetix MOM tag SK; 
536 prefix 


RCV /* There is a MOP receive outstanding. 
LOOP _wW_ASSIST bitfield mask; oe Loop an . res using a third node to 
assist, 
LOOP_W_ACCESS_CTL bitfield mask; /* Loop a node with using an access control 


string (supplied in the NICE message). 
Autoservice request received on an NI was 


/* a multicast. 
CONSOLE _CARRIER_LOAD bitfield mask; /* Down Line loading console carrier code 

/* (needed because the file format is 

/* different than other load files). 
NI_VOLUNTEERING bitfield mask; /* A multicast service request was received 

/* from a target on the NI. MOM is 

/t volunteering to perform the request. 

/* If the target does not respond, assume 

/* some other host was chosen by the target. 


/* Facility code 


OM tag $K;/* Signal code (519*16) 


+ 
— — . 


' 
i 
i | 
' 
i 
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8 MOM constants = Q10 buffer sizes, etc. 


constant NI_ADDR_LENGTH equals 6 prefix MOM tag $K;/* Longer of Ethernet addresses. 
constant NICE_BUF_LEN equals 197 prefix MOM tag $K;/* NICE message buffer length 

constant Q10 Bur CEN gets 512 prefix MOM tag $K;/* Q10 buffer Length 

constant P2 Buf CEN equals 104 prefix MOM tag $K; /* Max Length for P2 buffers. 

constant MAX_MOP_MSG_L ogua , 1500 prefix MOM tag $K;/* Maximum length for a received MOP message 
constant WI_PREFIX @quals %X000400AA prefix MOM ta ake l* Standard NI prefix used for DEC Phase IV 


routers. 
constant LOADUMP_NI_PROT equals 3388 prefix MOM tag $K;/* NI Load/Dump Protocol type for NI driver 
constant CONSOLE_NI_ PROT equals %X0260 prefix MOM tag $K;/* NI Remote Console Protocol type. 


constant LOOP_N T equals 5x0 90 prefix MOM tag $K;/* NI Loop Protocol type for NI driver 

constant MAX_COOP_HEADER equals 30 prefix MOM oo fax inun size the NI loop message headers 
can be. 

constant equals -1 prefix MOM tag $K;/* Default value for circuit loop help type. 


NO_LOOP_HELP 
constant SKIP_MUCTICASTS equals -1 prefix MOM tag $K;/* When Looking for a MOP message response, 
® 


P skip over multicasts. 
® 
os Internal loopback type codes. 

. 4 


constant ( 
LOOP _MOP /* MOP sooppers operation 
» LOOP_PHASE3 /* Phase III loopback operation 
, LOOP PHASE? /* Phase II Loopback operation 
) equals 0 increment 1 prefix MOM tag SC; 
end MOMDEF ; 
end_module SMOMDEF ; 


module SMOPDEF; 


4 
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/* 
* MOP message definitions 


/* 
A Define MOP function codes. ; | 
constant FCT_MLT equals 0 prefix MOP tag $; /* Load/dump Memory load with transfer address 
constant FCT_DCM equals 1 prefix MOP tag $; /* Dump Complete 
constant FCT_MLD equals ¢ prefix MOP tag $; /* Load/dump Memory oad 
constant FCT_ASV equals prefix MOP tag $; /* Load/dump Assistance volunteer (NI only) 
constant FCT_RMD equals 4 prefix MOP tag $; /* Request memory dump 
constant FCT_RID equals 5 prefix MOP tag $; /* Remote Console Request ID 
constant FCT_EMM equals 6 prefix MOP tag $; /* Remote Console Enter MOP mode (boot) 
constant FCT_SID equals 7? prefix MOP tag $; /* Remote Console System ID 
constant FCT_RPR equals 8 prefix MOP tag $; /* Load/dump Request program 
constant FCT_RML equals 10 prefix MOP tag $; /* Load/dump Request — load . 
constant FCT_RDS equals 12 prefix MOP tag $; /* Load/dump Request Dump Service (old MOP Mode Running) 
constant FCT_MDD equals 14 prefix MOP tag $; /* Load/dump Memory | data. 
constant FCT_PLT equals 20 prefix MOP tag $; /* Load/dump Parameter load with transfer address 
constant FCT_ALD equals $e prefix MOP tag $; /* Active loop data 
constant FCT_PLD equals 25 prefix MOP tag $; . Passive looped data 
® 
te Define MOP parameter codes. 
* 
constant PAR_NNA equals 1 prefix MOP tag $C; /* Target node name | 
constant PAR_NAD equals ¢ prefix MOP tag $C; /* Target node address 
constant PAR_HNA equals prefix MOP tag $C; /* Host node name 
constant PAR_HAD equals 4 prefix MOP tag $C; /* Host node address 
constant PAR_HTI equals 5 prefix MOP tag $C; /* Host system time 
/* 
fa Define MOP Software ID codes for Request Program and Boot messages. 
® 
constant SID_NON equals 0 prefix MOP tag $C; /* No software ID 
constant SID_OSY equals ZXFF prefix MOP tag $C; /* Standard Operating System 
constant SID_MAI equals ZXFE prefix MOP tag $C; /* Maintenance System 
/* 
8 Define MOP Processor codes for Boot messages. 
* 
constant PRO_SYS equals 0 prefix MOP tag $C; /* System processor 
constant PRO_COM equals 1 prefix MOP tag $C; /* Communications proceecer (for loading 
/* Console Carrier) 
/* 
os Define function codes used in NI loop messages. 
* 
constant NILOOP_REPLY equals 1 prefix MOP tag $C; /* Reply to looped message 


s 
constant NILOOP_FORWARD equals 2 prefix MOP tag SC; /* Forward looping message 
end_module SMOPDEF ; 
module SSVDDEF ; 
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/* 
/* Service Data 
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/* Definitions of target node service information. This information is 
/* retrieved from the volatile database and, if applicable, the NICE command. 


ts te SVDDEF structure fiil prefix SvD$; 
OVERLAY union fill; 
D longword runs gned; 
NFB-ID_FiELDS structure fill 


“Ut! ATABASEb dimension 5' HLL prefix SVDDEF tag $$ 


NFB byte unsigned; 

end NFB- it L 
end NFB_ID COVERLAYs 
NICE -10, word unsigned; 
NICE-TYPE arte uns igned; 
FLAGS_OVERLAY union fill; 

FCAGS byte unsigned; 

FLAGS BITS structure fill; 

MSG_PARAM bitfield mask; 


STRING_LER byte unsigned; 

Y union fill; 
STRING character Length 128; 
constant ENTRY_LEN equals . prefix SVD$ tag K 
constant ENTRY_LEN equals . prefix SVD$ tag C: 
PARAM Longword unsigned; 


/* 
* Parametr type definitions 
constant ( 
*BYT 
. *WORD'' 
- LONG 
STRING 
equals 0 increment 1 prefix SVD tag SK; 


—⸗ 


end STRING OVERLAY; 
end SVDDEF; 


end_module SSVDDEF; 
module SMDTDEF; 


/* 


2 It is saved in this table for use by Service during the service operation. 


NFB Field ID for Q10s to NETACP 
NFB Field ID database (subfield of NFB_ID) 


NICE message perameter | 
Parameter type in NICE m 
Flags field 


The parameter value was supplied by the 


D 
essages 


Byte length of parameter value 


If it's a string pyporte the string. 

Length of SVD table entries 

Len th of SVD table entries 

If it's * a string parameter, the parameter 
value. 
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table contains the ASCII device name strings associated with ; 
ven MOP device code. It is used 9 construct secondary and tertiary 
oad file names when none are specified in the database. The characters 
or ‘TER’ are concatenated with the device name string to construct 
a load file name. 


/ 
/ op Device Table definitions 
/* This 

/* gi 

/ 

/ 

/ 


~ 
*#eneee 22 © 


byte unsigned; 
EVSTRING address; 
constant ENTRYLEN equals . prefix MDT$ tag K; 
constant ENTRYLEN equals . prefix MDT$ tag C; 
end MDTDEF; 
end_module SMDTDEF; 


module SCIBDEF; 


aggregate MOTDEF structure fill prefix MDTS$; | 
. VTYPE | 
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/* 
A Channel Information Block (CIB) 


aggregate ee ee nat # fill prefix C1BS$; 
NI “HUORD ADDR BY OVERLAY union fill; 


HIORD_ADDR character Length 6 /* 
NI-HIORD-ADDR_FIELDS structure fill; 
NI -HTOR PREF —5 — — /* 
I“HIORD_NODE word unsigned; /* 
I1_HIORD_ ADDR_FIEL 
end NI_HIORD ADDR_OVER 
NI_HAROWR_ADBR character —— 6; /* 
FLAGS OVERLAY union fill; 
FCAGS word unsien ed; /* 
FLAGS BITS structure 
TARGET_ADDR_F IXED ithets wask; i 
® 
/* 
/* 
/* 
/* 
/* 
end FLAGS BI\S; 
end FLAGS_OVERLAY: 
RETRY_CNT Longword unsione 9: /* 
SETMOBE _P2 BUF OVERLAY union fill; 
oF TAoo E_P2-BUF character Lengt th 54; / * 
abe CIBLEN equals . prefix C1B$ t 
constant CIBLEN equais . prefix CIB$ t , 
® 
/* 


SETMODE P2_BUF_FIELDS structure fill; 
aus 17 Bis dimension , itt prefix CIBDEF ta 
P2_BOF_SIZ longword uns 

ongword uns 

Pe PROTOCOL lLongword un 
NI  PRYS tit character; 
end SETMODE P2_BUF FIELDS; 
end SETMODE Pe _BuF “OVERLAY; 
end CIBDEF; 
end_module SCIBDEF; 


module SNIHDEF; 


gned; 
byte dimension 14 u prefix CIBDEF tag $$; 
te dimension 18 itt! prefix CIBDEF ta 9 


f 
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HIORD NI address of target 


HIRD NI prefix assigned to Digital 
Node.address withing HIORD NI Sdéress of target 


Hardware Ni address of target 
Flags field ~~ 


Set when there is ta, alternate address 
to try in order to communicate with 
the target. Applies to any service 
circuit, but is most useful on the NI 
where the target could be responding to 
either a hardware address or a DECnet 
physical address. 


Transmit retry count for transaction. 
P2 buffer for telling NI driver which NI 


address we presenes to use (among 
other things 


$$: 
igned a9 5 MOP message buffer size 
FICL I dimension 2 fill prefix CIBDEF tag $$; 


* Put pad count on NI messages. 


* NI Protocol to use. 
Target NI physical address 
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fe 
/* NI header definition 


s. 
/* The NI gsv ce driver (XEDRIVER) returns the NI header for a message 


/* in the P 


perameter. There are several cases in which MOM needs to 


/* get this header in order to find out which target on the a message 
/* came from or whether or not it was sent to a multicast address. 


/e 


aggregate NIHDEF structure fill prefix NIH$; 
DEST_NI_ADDR_OVERLAY union fill; 
BEST_NI_RDDR character Length 6; 
MULTICAST byte uns gned: 
end DEST_NI_ADDR_ OVERLAY; 
SOURCE _NT_ABDR character Length 6; 
PROTOCOL_TYPE word unsigned; 
constant NI_HEADER_LEN equals - prefix NIH$ tag kK; 
constant NI_HEADER_LEN equals . prefix NIH$ tag C; 


end NIHDEF; 


end_module SNIHDEF ; 
module SMSBDEF ; 


/* destination Ni address of message 
/* Low bit set if destination is a multicast 


/* Source Ni address of message 
/* Protocol type of message 
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/* 
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/* Message segment block (MSB) definitions. The MSB is used to accumulate 
/* information with which to build the NICE response message returned to NCP 


/* when the operation is completed. 


aggregate MSBDEF structure fill prefix MSBS; 
FLAGS _OVERLAY union fill; 
FLAGS Longword unsigned; 


CODE_FL bitfield mask; 

DET_FLD bitfield mask; 

MSG-FLD bitfield mask: 
SG2_FLD bitfield mask; 

ENTD_FLD bitfield mask; 
ATA_FLD bitfield mask; 
LAG Pits 


fill; 
FICL_1 longword fill prefix MSBDEF tag $$; 
CODE byte unsigned; 
end FILL_1_ OVERLAY; 
FILL OvEML Ar union fill 


FIC Longword fill prefix MSBDEF tag $$; 
DEAT. word unsigned; 
end FILL_2_ OVERLAY; 


end MSBDEF ; 
end module SMSBDEF ; 
module SOBGDEF ; 


Flags 


Status code present (not used) 

Error detail field present (DETAIL) 

ropes text field present (TEXT) 

Second Line of message text present (TEXT2) 
Enitity descriptor field present (ENTITY) 
Data descriptor field present (DATA) 


Status code 


Detail 


Status code for text message. 

Status code for second Line of text msg. 
Entity descriptor address 

Data descriptor address 

Maximum MSB size 

Maximum MSB size 
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/* 
NML internal logging (debugging) flags 
/* file. The flags are defined by trans 


/* used by MOM. 
/* 


constant ( 
N 


*_s © 8 &© & & 
>r 
3 
ADO NO 


ese 8 © 


MOP_MDD 
j equals 0 increment 1 prefix DBG tag $C; 


end_module S$DBGDEF ; 
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/* These flags are used to enable Logging of specified data to the NML log 
ating the logical name WML$LOG, which 
/* MOM uses also. The permanent database and event logging flags are not 


Network send/receive logging 
File read/write Logging 
NPARSE state transition Loggin 
Loopback transmit/receive logging 
NETACP Q10 cope 

MOP send/receive ogging = see MOP_xxx flags below. 
Trace service operations 

Network event (EVL) Logging 


DBGSC_MOPIO 


ALL other MOP send/receive messages 

MOP Memory Load Data messages (MOP$_FCT_MLD) 
MOP Request Memory Load messages (MOPS$_FCT_RML) 
MOP Request Memory Dump messages (MOP$_FCT_ RMD) 
MOP Memory Dump Data messages (MOP$_FCT_MDD) 


023 -BT13A-SE DIGITAL EQUIPMENT CORPORA 
VAX/VMS V4.0 ? CONFIDENTIAL -AND PROPRIET 
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